home *** CD-ROM | disk | FTP | other *** search
/ Cocktail Hour / image.iso / COCKTAIL.DIR / objects_32_video temp.ls < prev    next >
Encoding:
Text File  |  1997-03-05  |  507 b   |  21 lines
  1. on mouseUp
  2.   global RecipeNum, CurrVideo, gProgrmPathOnHD
  3.   set the visible of sprite 16 to 0
  4.   repeat with i = 19 to 25
  5.     set the visible of sprite i to 0
  6.     case i of
  7.       20, 21, 23, 24, 25:
  8.         set the cursor of sprite i to 0
  9.     end case
  10.   end repeat
  11.   puppetSprite(24, 0)
  12.   puppetSprite(25, 0)
  13.   repeat with i = 31 to 36
  14.     set the visible of sprite i to 0
  15.   end repeat
  16.   set the cursor of sprite 13 to -1
  17.   set the cursor of sprite 17 to -1
  18.   forget(window "notes")
  19.   DoMovie(CurrVideo)
  20. end
  21.